Apple Reference & Presen…tion Library 4 (Reseller)/Apple Ref. & Pres. Lib.v4.0.iso/4-Demos/Apple Demos/Tutorials/Display Card 4•8⁄8•24 Training/Display Card 4•8_8•24 Training/card_9377.txt

Text File | 1990-03-19 | 7KB | 301 lines

-- card: 9377 from stack: in
-- bmap block id: 0
-- flags: 0000
-- background id: 4568
-- name: test 0
----- HyperTalk script -----
on closecard
  global maploc, cardloc
  put word 1 of the short name of this card into maploc
  put word 2 of the short name of this card into cardloc
end closecard



-- part 9 (button)
-- low flags: 00
-- high flags: 0001
-- rect: left=428 top=317 right=342 bottom=456
-- title width / last selected line: 0
-- icon id / first selected line: 18621 / 18621
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:


-- part 13 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=130 top=157 right=175 bottom=321
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
  global inProgress
  put true into inProgress
  lock screen
  go card "test 1"
  show cd fld "instruction 1"
  put empty into cd fld "Your Responses"
  put empty into cd fld "Your Answers"
  put empty into cd fld "memolist"
  put false into tryAgain
  repeat with r = 1 to the number of cd flds
    if word 1 of the short name of cd fld r = "answer" then
      put "" into cd fld r
    end if
  end repeat
  go back
  unlock screen
  push card
  visual effect dissolve
  go card "test 1"
end mouseUp



-- part 14 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=130 top=174 right=191 bottom=321
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
  global inProgress
  put true into inProgress
  lock screen
  go card "test 2"
  show cd fld "instruction 1"
  put empty into cd fld "Your Responses"
  put empty into cd fld "Your Answers"
  put empty into cd fld "memolist"
  hide cd fld "ClicktoContinue"
  show cd btn "Check my Answers"
  put false into tryAgain
  repeat with r = 1 to the number of cd flds
    if word 1 of the short name of cd fld r = "answer" then
      put "" into cd fld r
    end if
  end repeat
  go back
  unlock screen
  push card
  visual effect dissolve
  go card "test 2"
end mouseUp



-- part 15 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=130 top=190 right=207 bottom=303
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
  global inProgress
  put true into inProgress
  lock screen
  go card "test 3"
  show cd fld "instruction 1"
  put empty into cd fld "Your Responses"
  put empty into cd fld "Your Answers"
  put empty into cd fld "memolist"
  hide cd fld "ClicktoContinue"
  show cd btn "Check my Answers"
  put false into tryAgain
  repeat with r = 1 to the number of cd flds
    if word 1 of the short name of cd fld r = "answer" then
      put "" into cd fld r
    end if
  end repeat
  go back
  unlock screen
  push card
  visual effect dissolve
  go card "test 3"
end mouseUp



-- part 16 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=130 top=206 right=223 bottom=309
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
  global inProgress
  put true into inProgress
  push card
  visual effect dissolve
  go card "test 4"
end mouseUp



-- part 17 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=130 top=222 right=240 bottom=298
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
  global inProgress
  put true into inProgress
  push card
  visual effect dissolve
  go to card "qa 1"
end mouseUp



-- part 18 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=129 top=255 right=271 bottom=221
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
  global inProgress
  put true into inProgress
  set lockrecent to true
  lock screen
  go to card id 14320
  --show cd fld "instruction 3"
  put 1 into i
  repeat with i = 1 to 8
    --repeat with x = 1 to 3
    --set the hilite of cd btn x to false
    --put "" into cd fld "your answers"
    --end repeat
    if the short name of this card ≠ "q&a 8" then go next card
    add 1 to i
  end repeat
  go card "test 0"
  set lockrecent to false
  unlock screen
  push card
  visual effect dissolve
  go card "test 7"
end mouseUp



-- part 22 (button)
-- low flags: 00
-- high flags: 0001
-- rect: left=456 top=317 right=342 bottom=484
-- title width / last selected line: 0
-- icon id / first selected line: 18622 / 18622
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: next
----- HyperTalk script -----
on mouseUp
  answer "Click one of the sections." with "Help" or "OK"
  if it is "Help" then
    push card
    visual dissolve
    go card "howtoUse"
  else exit mouseUp
end mouseUp



-- part 27 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=174 top=312 right=340 bottom=336
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Return to Stack Map
----- HyperTalk script -----
on mouseUp
  go cd "map"
end mouseUp



-- part contents for background part 9
----- text -----
Macintosh Display Card 4•8 and 8•24

-- part contents for background part 11
----- text -----
test0

-- part contents for background part 4
----- text -----
Training Evaluation

-- part contents for background part 13
----- text -----
Introduction

-- part contents for background part 5
----- text -----

This section contains self-paced evaluation exercises. After you’ve correctly completed the evaluation, a certificate of completion will print.

• Features and Advantages #1 *
• Features and Advantages #2 *
• Compatability (Software) *
• Compatability (Hardware) *
• Questions and Answers *

• Score Card *